
SPECTRUM ROUTINE 



V i sarete già accorti, che il BASIC non sempre 
può soddisfare completamente le vostre esi¬ 
genze, riguardo la limitatezza dei comandi e soprat¬ 
tutto la velocità. Perciò si tenta di ricorrere a lin¬ 
guaggi più elevati come il PASCAL o il FORTH. 
Pero (E linguaggio macchina rimane la soluzione 
ideale. Ma (purtroppo Cc sempre un ma) come si 
sa, il linguaggio macchina c difficile sia da impara¬ 
re, che da usare. A tale proposito, ecco già pronte 
per voi tre brevi ma efficaci routine per la gestione 
della pagina grafica del vostro Spectrum. La prima 
e la terza servono per cancellare lo schermo in mo¬ 
do meno monotono che non usando il comando 


CLS da BASIC. La seconda routine, invece, dà ima 
sensazione di «traballo» alla schermata. 

Parleremo ora dettagliatamente di ciascuna 
routine. 

Routine 1 

Inserite il listato 1, sostituendo la variabile x con 
Pindirizzo di memoria, in cui volete posizionare il 
linguaggio macchina. Ciò è possibile, data la rido- 
cubilità del programma, lungo soltanto 22 bytes 11 
CLFAR x-1 in linea 10 ha la funzione di abbassare 
la RAMTOP, per far sì che il nostro programma 
non possa essere sovi ascritto accidentalmente. Da- 
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10 J 

20 J 

ROUTINE. 1 

ER60 

30 

ORO 

60000 

ER60 

40 

E NT 

60000 

ER60 

50 

LO 

8,3 

ER62 

60 CICLI 

LO 

HL,857FF 

ERS5 

70 CICL2 

LO 

E, «20 

ERS7 

30 

RND 

R 

ER66 

90 CICL3 

SLR 

r hl) 

ERBA 

100 

DEC 

HL 

ER6B 

110 

DEC 

E 

EftSC 

120 

JR 

NZ,CICL3 

ERBE 

130 

LO 

fi,#3F 

ER70 

140 

CP 

H 

ER71 

150 

OR 

NZ,CICL2 

ER73 

160 

DJNZ 

CICLI 

ER75 

170 

RET 

Pass 

£ errori: 

00 


Table used : 
Executes: 60000 

49 from 127 


10 CLEhR 

20 FGR a=X TG x+21 
30 READ vi PuKE a,V 
40 NEXT a 


■50 ORTh 6 , S , 
7,203,36,43,29 
32,242 ( 16 f 237 # 


3-3,255 
, 3 2 t 2 5 
201 


v 67,30 32 , le 
0,62,63,13S P 
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Metti un tocco di professionalità nei tuoi 
programmi dì grafica utilizzando tre brevi, ma 
super, routine di utilità. 


di MARCO LOCA FELLI 

le RUN e poi un SAVE «nome» CODE x,22. Per 
far eseguire il programma date semplicemente un 

Iandomize USR x* 

Nel listato 4 e raffigurato il disassemblato, per 
chi volesse apportare delie modifiche. Le figure 
1,2,3 e 4 rappresentano delle hard copy in diverse 
fasi d'esecuzione. 

Routine 2 

Copiate il programma del listato 2 c salvatelo 
come ìn precedenza, dando una lunghezza di 22 
bytes. Fate anche qui attenzione alla sostituzione 
delFx con il valore appropriato. Questa routine usa 
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20 

■ 

, 

ROUTINE.2 


30 




ER60 

40 


ORG 

60000 

ER60 

50 


ENT 

80000 

Efì&e 

60 


LD 

B , S 

ER62 

70 

CICLI 

LD 

HL,887FF 

ER&5 

80 

CICL2 

LD 

E «20 

ER67 

90 


AND 

fi 

ER68 

100 

CICL3 

RLC 

(HL) 

ER6fi 

110 


DEC 

HL 

Enee 

120 


DEC 

E 

ER6C 

130 


JR 

NZ,CICL3 

ERSE 

140 


LD 

A,tt3F 

ER70 

150 


CP 

H 

ER71 

160 


UR 

NZ,CICL2 
CICLI 

ER73 

170 


DJNZ 

ER75 

180 


RET 



Pass 2 srrors : 00 

Table used; 49 from 1£7 
Exe cu tes: 60000 



lo stesso concetto della precedente, ma invece di 
cancellare l’ultimo bit di ogni byte, lo rimette in 
prima posizione. Infatti, dopodiché il loop si è ripe¬ 
tuto 8 volte, lo schermo riappare senza modifiche. 
Se la spiegazione non vi è stata troppo chiara, os¬ 
servate il comando RLC (HL), il cuore del pro¬ 
gramma, nel disassemblato (listato 5). Questo co- 
mando si interpreta con «sposta circolarmente a 
sinistra il byte dcirindirizzo puntalo dal registro 
HL. Ecco un esempio: 10011001 diventa 00110011. 

Come vedete, bulli mo bit (7), è stato inserito ab 
Einizio del byte, spostando tutto il resto verso 
sinistra. 

10 CLEAR X-l 
£0 POR a =X TG x+21 
30 READ v: PGKE à,v 
40 NEXT a 

50 DATA 6,8,33,255,57,30,32,16 
7,203,6,43,29,32,250,52,63,188,3 
2,242,16,237,201 



57 











19 

#c- 




15 

* 

1 

ROUTINE 3 


16 

1 

f 



ER60 

20 


ORO 

60000 

Enee 

39 


ENT 

60000 

enea 

4.0 


LO 

n, «a© 

Enea 

50 

CICLI 

DEC 

n 

enea 

60 


PUSH 

RF 

ER64 

70 


LO 

6 ; »C0 

Enee 

90 


LO 

HL,«4001 

Enea 

90 


LO 

OE j0400© 

Enee 

100 

CICL2 

PUSM 

BC 

Eneo 

110 


LO 

SCj8001F 

En?o 

130 


LO 

fi,(DE) 

erti 

130 


LDIR 

En73 

140 


OEC 

HL 

ER74 

150 


LO 

(HU ,»00 

ER76 

160 


INC 

HL 

ER77 

170 


INC 

DE 

en?e 

130 


INC 

HL 

ER79 

190 


POP 

BC 

EH7R 

200 


DJNZ 

CICL2 

ER7C 

ni 


POP 

RF 

ER7D 


JR 

NZ ,CICLI 

ER7F 

230 


RET 

Pass 

2 errors; 

00 



Tabu used; 37 frOlii 137 

EXecuUs; 69300 


Routine 3 

Quest’ultima routine, lunga 32 bytes. provoca 
uno spostamento laterale verso sinistra dell’intera 
pagina grafica, cancellando la colonna più a destra. 
Ciò avviene 32 volle consecutivamente, lasciando 
così pulito lo schermo. Lo spostamento è di un 
carattere alla volta, e non bit per bit, il che rallente- 



10 CLGhiR x -1 
£0 POR a Tu x +31 
30 RERD v; POKE a,V 
40 NEXT a 

50 DftTft 62/32,61,245,6,192,33, 
1,64 ,17,0,64,197,1,31,0,26,237,1 
75,43,54,0/35,19,35,193,16,240,2 
41,32,227,201 


rebbe di molto reseci! zione. Il procedimento per 
caricare (listato 3) c far eseguire il programma è 
simile agli altri, soltanto nel salvarlo su cassetta 
dovete dare un SA VE «nome» CODE x 1 32. 
Troverete ìi disassemblato in figura ó. 

Queste tre routine daranno un tocco di profes¬ 
sionalità ai vostri programmi buon divertimento! 
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UTILIZZIAMO LO SPLCTRUM PER CRITTOGRAFARE I NOSTRI MESSAGGI SEGRETI. 

UN SISTEMA A PROVA DI INTELLIGENT SERVICE. 

di TULLIO POLICASTRO 






L a «cifratura», ossia la conversione in una for¬ 
ma non interpretabile senza conoscere una ap¬ 
posita «chiave», di testi o messaggi ha sempre pre¬ 
sentato un certo fascino. Chi dì noi non ha tentato 
rinvio di qualche messaggio in cifra alla compagna 
di classe delle elementari il cui fascino ci aveva fatto 
«innamorare», per dichiararle i nostri sentimenti in 
modo che solo lei potesse leggere le nostre parole? 
E lasciamo pure da parte tutto l'armamentario del¬ 
le spie e dei relativi film e romanzi; anche in campi 
piu «banali», come quello commerciale od indu¬ 
striale è tornato comodo talvolta poter spedire let¬ 
tere o telegrammi «in codice» che potessero assicu¬ 
rare una certa segretezza a comunicazioni vitali. 

Questo tipo di problema si presta in modo parti¬ 
colare ad essere affrontato e risolto mediante un 
computer. Una volta opportuna mente programma¬ 


to, questo ci assicura un lavoro di cifratura e di 
successiva decifrazione accurato, e soprattutto ra¬ 
pido e senza tutti i fastidi della continua consulta¬ 
zione di tabelle o codici. 

Il metodo che esporremo ha il vantaggio di una 
grande semplicità, unito ad una eccellente «resi¬ 
stenza» contro i tentativi di decifrazione. Mentre i 
sistemi di cifratura più semplici si limitano ad una 
banale sostituzione dì ciascuna lettera de! tasto con 
un’equivalente simbolico o letterale («a lettera 
eguale, sìmbolo eguale»), il che lì rende estrema- 
mente vulnerabili, il metodo descritto usa una paro¬ 
la chiave, che deve essere convenuta dalle due parti, 
per «spostare» alfabeticamente i vari caratteri in 
modo bensì sistematico, ma che non fa corrispon¬ 
dere praticamente mai ad una stessa lettera lo stes¬ 
so sìmbolo nel tasto cifralo. Un esempio chiarirà 
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IL PROGRAMMA 


i 

a 

3 


Il programma corscote di codificare 
e salvare un testo su nastro nonché 
di caricare un quulsiasi testo e decodificarlo 
una volta nota la parola chiave. 


OPZIONI 

Codifica di un tèsto e SflUE 

loro e decodifica testo 

STOP 




10 POKE £3653 
£0 REM SR di 
£3 LET t 
, 0, “ Iiiìpos ta il 
n 9 a codificato, 
ti. fti termine 
£4. INPUT Z$: 
t =LEN t $ : IF z 
N LET t|(t)a""; 
£6 LET t*=t$+ 
30 REM Sfi COd 
33 LET rosUfiL 
CS*c* 13 TO ) 


> 61 GG T0 100 
input dei testo 
CLS : PRINT ftT S 

testo che vuoi ve 
anche in piu'par 
imposta a." 

LET t*ot*+z$: LEI 
# ÌLEN Zi) ="#" THE 
RETURN 

" " : GO TO 24. 
i f i ca/decodi fica 
(c* ( TO 81); LET 


meglio il concetto più che tante parole. 

Si supponga di avere concordato la parola 
CRITTOGRAFIA. Si può trattare di una parola 
lunga a piacere, e le lettere ripetute non hanno al¬ 
cuna importanza. Non devono tuttavia esserci spazi 
o segni di interpunzione o simboli. Si immagini ora 
di scrivere la parola chiave, di seguito e ripetuta 
quante volte necessario, sotto il testo da cifrare (die 
può invece comprendere lettere, numeri, segni e 
simboli purché del sei ASCII — in pratica dal codi¬ 
ce 32 al 127, che come sappiamo, con poche ecce¬ 
zioni, sono anche ciucili usali dallo SPECTIUJM). 
Ecco un esempio: 

UN SALUTO AI LETTORI DI ELETTRONICA 
2000! 

CRITTOG R A FI ACRITTOGRA FI ACRITTOGRA- 
FIACRITT, 

Per la cifratura, si sostituisce ad ogni carattere 
del testo quello ii cui codice ASCII corrisponde al 
valore dato dalla somma dei codici ASCII sovrap¬ 
posti nella posizione occupata dal carattere in que¬ 
stione. Avremo così: 

— codice IJ = 85 c codice C = 67, il codice ASCII 
sostitutivo è 85 + 67 — 152; 

— codice N = 78 e codice R = 82, il codice ASCII 
sostitutivo è 78 + 82 = 160; 

— codice = 32 e codice 1 = 73, il codice ASCII 
sostitutivo è 32 -E 73 = 105; 

— codice ! = 33 e codice T - 84, il codice ASCII 
sostitutivo è 33 T 84 — 117, 

Si vede perù subito che, benché Io SPECTRL'M 
preveda anche codici superiori a 127 e sino a 255, 
diversi dei valori risultatiti dalla somma corrispon¬ 
dono a caratteri «non stampabili» (UDG o «to- 
ken»). Per ovviare a questo c’è una soluzione relati¬ 
vamente facile: basta sottrarre un valore fisso al 
risultato, in modo che questo ricada comunque nel¬ 
l’intervallo dei codici dì caratteri «stampabili» dallo 
SPECTRUM, che sono quelli da 32 a 127- In questo 
modo si può anzi rendere la chiave doppiamente 
sicura; se anche questo valore — che una breve 
verifica conferma deve stare fra 53 c 65 — entra a 
fare parte della chiave, per la sua variabilità rende 
ancora più difficile scoprire il metodo di attacco 
alla cifratura. In pratica, la chiave convenuta con¬ 


sterà di due cifre seguite da un gruppo di lettere: le 
due cifre comporranno il valore (fra 53 e 65) che 
andrà sottratto al risultato della somma dei due 
codici ASCII, mentre il restante gruppo di lettere 
costituirà la chiave vera e propria. 

C’è da dire, anticipando quanto verremo in parie 
dicendo più oltre, che qualora i Lesti in codice, dopo 
la cifratura, vengano scambiati tramite cassetta e 
non come messaggio scritto, la variazione del risul¬ 
tato della somma per rendere «stampabile» il rela¬ 
tivo carattere non è a rigori più necessaria, in quan¬ 
to comunque tutti i cadici verranno passati come 
numeri memorizzati sul nastro. Il programma può 
in tal caso venire semplificato; ovvero, mantenendo 
la «doppia» chiave con un numero di due cifre m 
testa, per questo non ci sono più limitazioni, salvo 
quello di non superare 97 (=32(codice dello spazio)“ 
-hó5(codice di A), ossìa il valore più basso possibile 
per la somma dei codici). 


Per decifrare 

E abbastanza evidente che per la decifrazione si 
impiegherà il sistema inverso: al codice di ciascun 
carattere del testo «in cifra» si sommerà il valore 
fisso formato dai primi due caratteri della chiave 
«completa», mentre si sottrarrà il codice della lette¬ 
ra che appartiene alla chiave e posto (idealmente) 
sotto di esso, come nelPesempio fatto. 

Il programma realizza la cifratura e la decifra¬ 
zione, dopo aver chiesto cd ottenuto la chiave for¬ 
mata dì due cifre seguite da un gruppo di lettere 
maiuscole. Per semplicità anche il tasto da cifrare 
verrà scritto in maiuscole (che vengono automati¬ 
camente inserite al lancio dei programma), ma si 
possono usare anche cifre, segni di interpunzione e 
simboli vari (ASCII), 

Poiché anche il testo «cifrato» risulta appunto 
non composto solo da lettere, bensì da tutti i possi¬ 
bili caratteri ASCII, la trascrizione per la successiva 
decodifica può portare facilmente ad errori. Si è 
perciò ritenuto utile, dopo aver comunque stampa¬ 
to a scopo dimostrativo come appare il messaggio 
in cifra, salvare questo su nastro come stringa, «al- 
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34 LET IsLEN t$: LET i*l: LET 
Ui 

36 LET t $ C i ) aCHR$ (CODE t*UÌ + 
f* KCODE C* ÌK) -Ni n 


33 

LET ìai+1; 

IF 

i>t THEN 

RETU 

RN 





43 

LET KsK+1: 

IF 

K >LEN C$ 

THEN 

LET 

K =1 




42 

G0 TO 36 




100 

REM Routine 

P 

rincipale 


110 

CLS : PRINT 

R 

T 4,6;"0 P 

Z I 

0 N 

I ,w " 




120 

PRINT ”1 - 

Codi fi ce di 

un t 

6S IO 

e SRUE . 2 


LORO e decodi 

fi Ci 

testo.3 


STOP 1 ' 


130 

IF iNKEYts" 

i 1 

THEN GO T0 

i 130 

140 

IF INKEY 

I ** 

THEN LET 

f =1 

160 

IF INKEYSss " 

a" 

THEN CLS 

: LE 


T f»~i: PRINT tei; "Carica il test 
o dal nastro ! 11 ; LORD ‘ KRYPTON 1 * 
160 IF XNKEY$ = ,, 3 n TNEN GO TQ 90 
00 

ITO CL5 : INPUT 11 Imposti re La p 

aro La chiave.ci primi 2 carati 

eri devono dareun numero fra 53 

e 66 *"c$ 

130 IF CSC TO £) <“53" OR CSC TO 
2) >"68" THEN GO TO 170 
190 IF fa1 THEN GO SUB 20 
200 GO SUB 30; CLS ; PRINT t» 
£10 IF fai THEN PRINT glj_"SaLva 
il codice su nastro!' 1 ; LET c|s" 
: LET Zi»"*'; LET ffl =0 : LET fi-fi 
SRUE "KRYPTON" LINE 170 
220 PRINT ni;“Per il menu premi 
un tasto!*'; PRUSE 0; GO TO 100 


legata», per maggiore comodità, allo stesso pro¬ 
gramma di codifica/decodifica* Ovviamente ven¬ 
gono preliminarmente eliminate le due chiavi, ed il 
programma viene addirittura reso «autostart» in 
modo da ottenere senza alcuna fatica il messaggio 
«in chiaro», dopo iJ LO AD* 

Il programma fa largo ricorso alle varie manipo¬ 
lazioni delle stringhe, e può quindi risultare interes¬ 
sante anche come esempio didattico. Ne diamo ora 
una breve descrizione sulla base del listato. 

Linea IO: fissa i caratteri maiuscoli, e rinvia al 
menù delle opzioni. 

Linea 20-26: subroutine di introduzione del testo 
da mettere in cifra* 

Esso può venire introdotto «a pezzi» (il pro¬ 
gramma inserisce in tal caso automaticamente uno 
spazio fra le diverse parti), o di seguito; e può essere 
modificato o corretto a piacere (spostandosi con le 
-* —- e usando DELETE) sino a quando non si c 
premuto ENTER. 

Ad indicare la fine del testo si imposterà come 
ultimo carattere il «cancellato» # (in fondo alfuL 
tima stringa, o anche da solo). Il testo base viene 
memorizzato come unica strìnga t$. 

Linee 30-42: subroutine di codifica o decodifica, 
a seconda del/opzione prescelta dal menu* La dif¬ 
ferenza sta nel valore del «Rag» fi che vale I per la 
cifratura (somma dei codici e sottrazione del valore 
fisso) e —1 per la decifrazione (sottrazione dei co¬ 
dici e somma del valor fisso); m c il valore della 
chiave «numerica» (fra 53 e 65) formata dai primi 
due caratteri della chiave originale; la chiave «lette¬ 
rale» viene poi ricavata come c$, eliminando queste 
due prime cifre. 


La Linea 36 

L’effettiva operazione di codifica/decodifica dei 
singoli caratteri è effettuata dalla singola linea 36, 
che viene ripetuta per tutti i caratteri che compon¬ 
gono t$. La variabile K individua i diversi caratteri 
della chiave, e viene «rimessa» ad I ogni volta esau¬ 
rita la sequenza dei relativi caratteri. 

Linea 100 e seguenti: programma principale* Ini¬ 


zia con la selezione di una delle tre opzioni possibili 
(codifica e salvataggio del codice su nastro; carica¬ 
mento del codice da nastro e sua decodifica; uscita 
dal programma), che avviene utilizzando la funzio¬ 
ne INKEY$ per una maggiore semplicità. Nel caso 
de)/opzione 2 occorre logicamente caricare da na¬ 
stro la stringa del codice t$, occorre poi, anche nel 
caso 1, impostare la chiave (con verifica che i due 
primi caratteri compongano un numero fra 53 e 
65)* Con l'uso delle subroutine già citate si procede 
poi alla codifica od alla decodifica: nel primo caso 
viene stampalo, a scopo dimostrativo, il messaggio 
«in cifra», di cui si chiede però poi il salvataggio su 
nastro, cancellando preventivamente le variabili 
che potrebbero dare indicazioni utili (m c cS) a chi 
volesse indebitamente decifrare il messaggio. Come 
è noto, quando si salva un programma dopo la sua 
esecuzione senza eseguire preliminarmente un 
CLEAR, assieme al programma vengono memoriz¬ 
zate sul nastro anche tutte le variabili con nome e 
valore, che vengono recuperate al/atto del LOAD, 
purché non si faccia seguire RUN o CLEAR. Perciò 
il SAVE viene effettuato con LINE 170, che a cari¬ 
camento effettuato (programma + variabili) fa par¬ 
tire automaticamente le operazioni di deeiIraiura, e 
fornisce il testo «in chiaro» sullo schermo, purché si 
sìa introdotta la chiave (completa) corretta. Atten¬ 
zione che se la chiave viene introdotta errata anche 
solo per un carattere non c possibile ripetere la de¬ 
cifrazione, salvo che ripartendo di nuovo dal cari¬ 
camento da nastro: questo perché la codifica altera 
t$ convertendolo — se la chiave é esatta — nel 
messaggio voluto* Inutile quindi fare GO TO 100 o 
simili. 


Come si modifica 

Il programma sì presta ad essere modificato, sia 
nel senso in precedenza accennato (eliminazione o 
variazione della parte numerica della chiave), sia — 
se abbiamo sufficiente pazienza — per rendere pos¬ 
sibile la decifrazione di messaggi in codice imposta¬ 
ti da tastiera (da assegnare a t$ con la SR 20). — 
Buon divertimento! ■ 


65 



DIDATTICA 




LA PROGRAMMAZIONE DB! MODERNI MICROCOMPUTER 
IN LINGUAGGIO MACCHINA. QUINTA PUNTATA. 

dì P. TODOROVICH & C. ERMACORA 



E ntriamo ora nei vivo della 
programmazione con un im¬ 
portante argomento riguardante 
coloro che conoscono qua!cosina 
di linguaggio macchina: la ride¬ 
rmi zio ne delBinterrupt dello 
Spectrum. 

L' in terni pi è una routine in 
LM; viene chiamata automati¬ 
camente ogni cinquantesimo di 
secondo indifferentemente dai 
programmi in esecuzione. L’in- 
tcrrupt è normalmente adibita a 


due importanti funzioni. La pri¬ 
ma è la lettura della tastiera e il 
cambiamento della variabile di 
sistema indicante l'ultimo tasto 
premuto, L'altra riguarda Pag¬ 
giornamento delle tre variabili 
ERÀMES. Queste contano in 
cinquantesimi di secondo il tem¬ 
po trascorso dall Accensione del 
computer. 

Se ridefiniamo in memoria 
RAM la routine d'interrupt otte¬ 
niamo la possibilità di: definire 1 


tasti funzione, fare un orologio, 
un monitor assembler per uscire 
da qualsiasi situazione critica, 
ecc. Tutto ciò è realizzabile sem¬ 
plicemente tramite l’aggiunta di 
un programma, su misura, alle 
normali routine*. 

I vantaggi nell'uso degli inter¬ 
ra pts sono notevoli qualora si 
voglia che una particolare fun¬ 
zione (di controllo tasti o altro) 
venga eseguita contemporanea¬ 
mente all’esecuzione di Basic o 
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programmi in linguaggio mac¬ 
china, Intatti alTarrivo dj un im¬ 
pulso della ULA (50 in un secon¬ 
do). viene eseguita con priorità 
assoluta la routine di ìnterrupt, 
(qualsiasi cosa stia facendo la 
CPU). Essa sembra quasi fun¬ 
zionare contemporaneamente al 
programma principale. Scopo 
del presente articolo è spiegare 
come si possa ridefinire Tinter- 
rupt. Lasciamo alla fantasia c aL 
l'abilità de! lenti re il trovare utili 
applicazioni. Per cominciare ve¬ 
diamo di richiamare alcuni dei 
comandi del processore Z80 che 
ci riguardano: 

imO/i/2 MODO D’INTER- 
RUPT 0,1,2 

di DISÀBILITAZIONE IN¬ 
TERE. 

ei RIABILITAZIONE 1NTERR. 

Queste istruzioni Assembler si 
ritrovano elencate, assieme alle 
alire. nell’appendice A del ma¬ 
nnaie. In questo sono riportati \ 
numeri (in decimale c in esade- 
cimale) die le denotavano. Le 
prime tre istruzioni stabiliscono 
il modo di intcrrupt (che è nor¬ 
malmente fissalo al Tacce nsionc 
del computer con «imO» ma fa¬ 
cilmente modificabile). Le altre 
attivano o disattivano Fimcrrupt 
permettendoci di controllarlo. 

Con Timerrupt mode 0, dispo¬ 
nibile all'accensione, viene ese¬ 
guita la routine alla locazione 56 
della ROM. Questa effettua la 
lettura della tastiera e raggior¬ 
na mento delle variabili come ho 
spiegato prima. 

Cambiamo con itn2 il modo 
d’intempt: possiamo collocare 
altrove le routine^ d’ìnterrupt, 
usando opportunamente il regi¬ 
stro «i» della CPU. Precisamente 
tale registro serve da puntatore 
ad una coppia dì bytes m cui è 
memorizzata la locazione da cui 
parte la nostra routine. Essendo 
«K un registro singolo, può con¬ 
tenere solo numeri compresi tra 0 
e 255. Le locazioni in cui può 
puntare sono date da: 

256 * (valore dì i) + 255 

L’esperienza insegna che per 
non originare strani disturbi sui 
video (dovuti alla diversa gestio¬ 
ne delle memorie), il registro «i» 
deve puntare ad una locazione 
della ROM. compresa tra 0 c 
16384. In tal modo le sole loca¬ 


zioni in cui possiamo collocare La 
routine di ìnterrupt sono date 
dalla seguente linea: 

10 POR i - 0 TO' 63: PRINT «va¬ 
lore di i «;t,^/locazione «;PEEK 
fi * 256 +■ 255) + PEEK (i * 256 
+ 256) * 256: NEXT i 

Se, arrivati a questo punto 
avete le idee un po’ confuse, cari¬ 
cate pure il programma di figura. 
Questo vi permette di inserire 
una qualsiasi vostra routine LM, 
all interno di un nuovo intcrrupt. 

11 programma funziona in tal 
modo: il linguaggio macchina 
contenuto nelle linee di DATA, 
viene caricato automaticamente 
nel REM della prima linea. Poi, 
dando RANDOM1ZE USR 
23760, il nuovo intcrrupt sosti¬ 
tuisce quello esistente. Per mag¬ 
giore chiarezza riponiamo il li¬ 
stato assembler del programma 
LM contenuto e vediamo di 
interpretarlo. 

Routine di cambio ìnterrupt* 

Id a,25 

Id i,a 

im2 

rct 

imO 

ret 

nuovo Ìnterrupt: 
di 

push hl/push de/push bc/push 
af cali 56 

cali x (x—locaz. data in input) 
pop af/pop bc/pop de/pop hi 
ei 
ret 

La prima ruotine, attivabile 
con RANDOMIZE USR 23760, 
cambia Pinterrupt mode, pone 
nel registro «ì» il valore 25 e tor¬ 
na al Basic. 

Da quel momento in poi (50 
volte al secondo) la CPU legge 
alla locazione puntata da <d» 
(6655) lindi rizzo a cui saltare 
(23842), che guarda caso è l'ini¬ 
zio della seconda routine. 

Questa salva nello slack tutti i 
registri per evitare che vengano 
alterati, chiama la routine di 
ROM per la scansione della ta¬ 
stiera. fa eseguire il programmi¬ 
no do voi inserito e ripristina i 
registri. 

1 comandi ^di» cd «ti** servono 
ad evitare clic la routine possa 
essere richiamata prima del suo 
stesso termine, nd caso fosse di 
notevole lunghezza. 


BACK-UP 
SENZA HEADER 


Alcune volle può accadere di avere 
alcune difficoltà a duplicare pro¬ 
grammi che vengono caricati senza 
header. Illustriamo ora un semplice 
programmino in assembler che elimi¬ 
na (ali problemi di duplicazione. La 
Speci rum registra i propri dati su na¬ 
stro, suddivisi in due parti: hi prima 
parte, chiamata licader, confici)? in¬ 
formazioni sul caricamento del pro¬ 
gramma: la seconda contiene i dati ve¬ 
ri e propri, Nelfheadcr troviamo il 
nome del programma, l’area totale di 
memoria usata, la linea di partenza 
dello autorem o l'indirizzo del primo 
byte registrato. Ora vi chiederete, 
come può il computer accettare i 
programmi senza header, non a vernici 
a disposizione tutte queste informa¬ 
zioni? li trucco sta nel programma cht 
lo precede c che fornisce tutti i dati 
necessari al caricamento: il corpo 
principale può essere caricato in 
moria solo se prima ha letto il pro¬ 
gramma caricatore. Tutti i programmi 


Un’applicazione banale del 
programma, associato alla routi¬ 
ne vista in precedenza, può essere 
la ri numerazione automatica lid¬ 
ie linee. Applicazione un po' più 
interessante è la realizzazione di 
un trace per seguire il funziona¬ 
mento di un programma in Ba¬ 
sic, con stampa automatica deila 
linea in esecuzione e {magari su 
richiesta) delTeienco delle varia¬ 
bili con il loro valore. 

Una volta capito come ridefi- 
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5 REM 


realizzato da 
Corrado Erma cora 


10 CLEflR 65535 

11 INK 7: PRPER 1: CLS 

14. PRINT AT 5,6; “Bàcl-up senza 
neader";AT 12,6; '*by Elettronica 
2000 '* 

20 RESTORE 
30 FOR r, =0 TO 55 
40 READ a: POKE 23296+n,a 
50 NEXT n 

60 RANDOMIZE USR 23296 
70 DATA 62,255,17,255,255,221, 
33.202.92,SS,205,66,5,122,47,8 7 , 
123,47,95,27,27,213,62,253,205,1 
,22,175,17,161.9.205,10,12,253,2 
03,2,236,205.212,21,209.33,202,9 
2.126,221,33,203,92,205,194,4,19 
5,0,91 




commerciali anno provvisti di earica- 
ior*. Il listato in assembler che vi pre¬ 
notiamo, permette di avere una copia 
Liei programma senza header, sia esso 
protetto ó non protetto. Il basic li a la 
iun/ione di inserire il linguaggio mac¬ 
china e scompare durante il fun/iona- 


menlo, Il BÀCK-t II 1 si trova nel prin¬ 
ter buffer dalla locazione 232% in poi. 
Dopo aver introdotto da tastiera il 
programma date RUN. li computer si 
mette in ascolto e attende che cari¬ 
chiate il programma da duplicare. Ap¬ 
pena finito appare la scritta: 


«Start tape, Ihen press an> key» 

A questo punto togliete l’originale, in¬ 
serite una nuova cassetta e premete un 
tasto. I! programma viene salvato e 
voi otterrete una nuova cassetta iden¬ 
tica airoriginale, Infine il computer è 
pronto per duplicare un altro prò* 
gramma. 

Due parole sul funzionamento di que¬ 
sto BACK- LiP. Vengono usate due 
chiamate di ROM per duplicare i dati: 
La prima chiamata (cali 1366) serve 
per porre il computer in ascolto e im- 
magaz/imz.za tutti i dati che riceve, 
dalla locazione 23755 in pai; la secon¬ 
da chiamata (cali 1218) viene utilizza¬ 
ta per salvare il programma senza 
header, dopo aver calcolato la lun¬ 
ghezza del corpo nel registro DE, 
Questo BACK-UP può essere usato 
impropriamente per duplicare pro¬ 
grammi standard. I. necessario ave¬ 
re però V accortezza di caricare e re¬ 
gistrare prima ì'header e poi il blocco 
dati, come se si trattasse di due pro¬ 
grammi separati. La struttura del 
Back-up permeile un sìmile utilizzo 
poiché essa è capace di riconoscere ciò 
che viene caricato ed, a maggior 
ragione, dì salvare correttamente il 
contenuto. 


nìrc rinterrupt c ideata la routine 
per la funzione richiesta, convie¬ 
ne spostare tutto i! linguaggio 
macchina sopra la Ramtop in 
una delle locazioni consentite. 
Questo elimina la scomoda di¬ 
pendenza dui Basic e permette 
massima libertà nella program¬ 
mazione. 

In generale un programma 
d'internipt deve avere queste 
caratteristiche: 

essere di breve esecuzione (per 


evitare eccessivo rallenta mento 
del programma principale); 
lasciare lo stack esattamente co¬ 
me lo ha trovato (cioè vi dovran¬ 
no essere tante «pop» quante so¬ 
no le «piish» usate); 
terminare con «ret*. 

Fate molta attenzione nell'uso 
delle chiamate di ROM (rst 16 
ccc,), poiché spesso compiono 
scambi di registri o alterazioni 
dello stack che non sono molto 
salutari... 


Come conclusione a questa se¬ 
rie di articoli dedicata allo ZX 
S peci rum, lasciamo la costata¬ 
zione che le possibilità di un 
computer sono proporzionali al¬ 
la conoscenza che sì ha di esso. 

Speriamo perciò con queste 
pagine di avervi dato la capacità 
di utilizzare al meglio il vostro 
Spectrum. Esso, infatti, se sa¬ 
pientemente programmato, può 
competere con sistemi molto più 
potenti. 


10 REM 000000000 

00000000000000000000000000000000 
00000000000000000000000000000000 
00000000000000000000000000000008 
00000000000000000000000000000000 
£0 PRPER 1: SQRDER 1: PAPER 1; 

INK 7: CLS : PRINT AT 8,4; "RIDE 
FINIZIONE D 4 INTERRUPT";AT 18,7;" 
01 PIERO TODOROUICH" 

30 POKE 33756,0: REM protezio¬ 
ne della prima linea di progr. 

40 RESTORE 

50 POR a*33760 TO 33769 
60 READ b: POKE a,b 
70 NEXT 1 
30 REM 

blocco dati della routine 
di rider iniziane deu ' in terrupt 
: RANDOMIZE USR 33760 attiva 
: RRNDOMIZE USR 3376? disattiva 

90 DATA 63 ,35 , 337,71,337,94,30 


1,237.70,201 

Ì00 input "Quale e' la locazion 
e di partenza del tuo programma 
7 loc 

110 randomize loc 

120 LtT X=PEEK 33670 
130 LET y aPEEK 33671 
140 FOR a*33843 TO 23658 
150 READ b: POKE a,b 
160 NEXT a 
170 REM 

blocco dati della routine di in 
ter rupi ri de fita con salto alla 
locazione data in input* 


180 DATA 243,229 > 213 , 197 ,245,20 
5,55,0,205,* ,y,241,193,209,225,2 
51,201 

190 BORDER 0: CLS : PRINT "Cari 
ca ora il programma che vooiìnst 
ri re e dai RANDOMIZE USR 23760 p 
er attivare i ' interrupt■" 
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